Top 10k strings from 16-48 Magazine - Issue 03 (1984)(16-48 Tape Magazine)[a].tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
10 ;" ":
8 Magnetic Magazines Ltd.*6\$:
5 z$="10020203RUN THE TAPE":
5 PPPPPPPPPP
5 B.C.THORNE APRIL 1983*S\
5 ;"PRESS ANY KEY"
5 16/48 script
4 @@@@@@@@@@@@@
4 @@@@@@@@@@
4 0000000000000000000000000000
4 )=n(hole+3
4 );" ";n(hole+3
4 ((prog+474
3 z$="09020203STOP THE TAPE":
3 ;"PRESS ANY KEY":
3 pp00000p000
2 z$="10020203STOP THE TAPE":
2 z$="00030103"+a$:
2 yyyyyyyyyy
2 n,o;" ":
2 m,o;" ":
2 ^00000000FFFFFFFFF00
2 ]MAGNETIC MAGAZINES 83:H\
2 MAGNETIC MAGAZINES :
2 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@****************
2 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
2 @@@@@@@@@@@@@@@@@@@@@@@@@@@
2 @@@@@@@@@@@@@@@@@@@@@@@
2 @@@@@@@@@@@@@@@@@@@@@@
2 @@@@@@@@@@@@@@@@@@
2 @@@@@@@@@@@@@@@@@
2 @@@@@@@@@@@@@@
2 @@@@@@@@@@@@
2 @@@@@@@@@@@
2 ;"Press any key":
2 ;"PLEASE WAIT":
2 ;"Keep the tape running":
2 ;" "
2 ;" ";
2 8888888888888888888888888888
2 2222220000000000000000000000000022
2 22000000000000000000000000000
2 0800 !!!!
2 022222000000000FFFFFFFFF00
2 022222000000000F;;999;;F00
2 02222000000000000000000000
2 002220000000000F;;999;;F00
2 000000000000000F;;9998;F00
2 000000000000000F8;99888F00
2 (paddr/256
2 "16/48TITLE"
2 "16/48REV#3"
2 "16/48LOAD2"
2 "16/48LOAD1"
2 "16/48EDIT"
2 B.C.THORNE DEC 1982
2 8 !
2 8 8 8 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
2 1983 16/48 Magazine Ltd*S\
2
2
1 z$="ll130201AND ":
1 z$="ll020302GREEN MEN":
1 z$="ll000402DUNGEONS":
1 z$="18030203Stop the tape":
1 z$="18030203<THE WINNER!":
1 z$="18020203Start the tape":
1 z$="18010202THEN READ ON....":
1 z$="16000305Like this.":
1 z$="15030204Stop the tape":
1 z$="15010604SORRY":
1 z$="15000402PRESENTS":
1 z$="14030204GOLDEN BATON":
1 z$="14010102KEEP HAVING TO PULL THE PLUG??":
1 z$="13020203LONG WAY HOME":
1 z$="1202050316/48":
1 z$="11110202THE":
1 z$="11010102CAN'T FIND THAT TREASURE?":
1 z$="10050305"+
1 z$="10050102PLEASE STOP THE TAPE":
1 z$="10040103Please let the tape run.":
1 z$="10030203STOP THE TAPE":
1 z$="10020102Please let the tape run.":
1 z$="09010202Y":
1 z$="09010202D":
1 z$="09010202A":
1 z$="08300210?":
1 z$="08010102STUCK IN A DUNGEON?":
1 z$="07040202HOBBIT HINTS":
1 z$="07010202T":
1 z$="05050305SCORE":
1 z$="04000404Way home":
1 z$="04000404Renumber":
1 z$="03030202INSTRUCTIONS":
1 z$="01040303The long":
1 z$="00140201OF":
1 z$="00010503VORTEX":
1 z$="00010503SPIDER":
1 z$="00010203PIXEL SCROLLING"
1 z$="000008051984":
1 z$="0000060516 48":
1 up to more than 3.
1 type GOTO GO
1 t$="0000000000"
1 t$(n)="1":
1 scroll right
1 scroll left
1 s=prog+211
1 renumber y
1 renintro e
1 r$=r$+" ":
1 prog=prog+len+6
1 prog=prog+6
1 prog=prog+5
1 prog=prog+1
1 prog=paddr+3
1 prog+len+5
1 prog+len+4
1 paddr=paddr+jump
1 p00000p022
1 p00000p000
1 p$="1122334455667722744":
1 oldl,oldc;"
1 o,o;"Press any key to return to menu.":
1 m$="with a fast response time.<Graphics are artistically very<good (artist Jon Blacow) and<are rapidly drawn then painted<by an unusual but quick fill<routine, essential as all<locations are displayed. Even<here you have the option to<switch from graphic-text to<text only and back again,<which makes going to retrieve<that forgotten but essential<object ten locations back<almost a joy.":
1 m$="well designed and challenging":
1 m$="stolen Golden Baton, a<priceless artifact with the<power to maintain the dynamic<equilibrium between the good<and evil forces of nature!< The world of the Golden Baton<is one of woods, caves and<castles, which are populated by<some very strange adversaries!":
1 m$="our mission is to recover the":
1 m$="igital Fantasia's":
1 m$="he program is well designed,":
1 m$="adventure that will keep you<perplexed and entertained on<these long winter evenings.<Get a copy for when you tire<of VALHALLA.<If you already own<THE GOLDEN BATON and need<help, just ENTER the last<6 digits of Digital Fantasia's<phone number for a help menu.<Everyone else just press ENTER.":
1 m$="You will need the staff and<the magic word":
1 m$="You have to be wearing the<helmet to read the runes":
1 m$="What do you expect if you<swim moats with matches in<your pocket?<Throw matches across moat.<IF you forget rub the ring<for help":
1 m$="Try going places< Example GO PATH":
1 m$="This month we look at the<first in the series;< < THE":
1 m$="The rope is in the Briar.< <Maybe HACK Briar?":
1 m$="Remember that old tatty cloak?<things are not what they seem!":
1 m$="MY mistake! I forgot that the<Hobbit has an unstable<geography When short-cuts are<taken.< <DO YOU WHANT TO SEE THE NORMAL<ROUTE< Y/N":
1 m$="Kill the slugs with the salt<and feed them to the crab ":
1 m$="If you have discovered any<solutions, interesting short<cuts or bugs in any adventure<game then drop us a line at<16/48. We will send you `5 if<we publish your contribution.<Send us your problems and we<will do our best to save you<from death, destruction and<an over heated Spectrum":
1 m$="From the Misty mountains go;<N,NE,N,SE,DOWN,D,D,D,E,<TAKE KEY<UP,W,N.< <My thanks to the myriad of<readers, who pointed out this<error.":
1 m$="First my apologies for the<incorrect hobbit hint in<issue 1.":
1 m$="Find the mirror and<HOLD MIRROR just before you<enter the room.":
1 m$="Brian Howarth is a most<prolific author. In the last<few years he has written,<designed and coded ten<adventures in the Mysterious<Adventure series and translated<them to run on the five most<popular micros including, of<course, our beloved Spectrum.":
1 letter
1 k$="You have killed":
1 j$=" junction between corridors.":
1 instructions
1 i$="You are injured.":
1 hole=hole-4
1 hole=hole-1
1 hole=hole+4
1 hole=hole+1
1 ff=n(hole+3
1 elements \
1 cl=cl+(l>cl)*(
1 cl)+("West "
1 cl)+("Up "
1 cl)+("South "
1 cl)+("East "
1 cl)+("Down"
1 cc=cc+(c>cc)*(
1 cc=(c+xx):
1 advintro#1o
1 a$=a$+". "
1 a$=a$+". P O K E 2 3 6 5 8 , 8 switches ~C A P S L O C K~ on"
1 a$=a$+" I especially like the m.c. routines & the hardware tests"
1 a$=a$+" Poking ~0~ in will switch it off again. "
1 a$=a$+" R A N D O M I Z E U S R 3 2 8 0 scrolls the screen up 1 line."
1 a$=a$+" "
1 a$=a$+" OK. I know it's not the first Spectrum mag on tape, but if No1 is anything to go by it's the best !!"
1 a$=a$+" "
1 a$="west":
1 a$="south":
1 a$="north":
1 a$="east":
1 a$="down":
1 a$="SPACESUIT":
1 a$="PICTURE":
1 a$="PICTURE"
1 a$="BASIC RENUMBERING PROGRAM":
1 a$=" Here are some P O K E S that some of your readers may like to see. "
1 a$=" Dear Ed. Just thought I would scroll you a line about your ~ace~ new mag."
1 a$=" Well that's about it, keep up the good work, I can't wait for No 2. Yours sincerely Pete Telfer P.S. Hope this fits in 16K !!"
1 a$=" Press ~R~ to read again or ~C~ to continue":
1 a$=" P O K E 2 3 6 9 2 , 2 5 5 gives you an ~A U T O S C R O L L~ which stops the ~scroll?~ report code when some thing is printed below line 2 1"
1 a$=" P O K E 2 3 6 0 9 , n changes the duration of the keybord ~C L I C K~"
1 a complete copy of the game, details of where you are & what has happened to you."
1 ^PPPPzzxxxxxxxxxxxxxxxxxzzzzzPPPPPPPPPzxxxxxxxxxxxxxzzzzzzzPPPPPPPPPPPzzzzxxxxxxxxxxzzzzzPPPPPPPPPPPPPPPPzzxxxxxxxzz8zzPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP_____8PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPWWWPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPT``````````TPPPPPPPPPPPPPPPPPPPT`````````````TPPPPPPPPPPPPPTTTT``````````````TTPPPPPPPPPPPPP``````````````````TPPPPPPPP888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
1 ^88888888888888888888888888888888
1 ^'???????88888888888888888888'' '''''88?88888888888888888''' ''''8888888888888888'' pp04444
1 ]B.C.THORNE APRIL 1983:H\
1 Z$="00030103"+A$:
1 WORDS %
1 VORTEX
1 The flashing No's must not add
1 THE 15
1 T$="0000000000"
1 Suddenly you fall through the floor.
1 STOP THE TAPE
1 SPIDER
1 SCROLL 3
1 Rewind & play tape (
1 RUNUMBERING LINE NUMBERS
1 RUN THE TAPE
1 RENUMBERING ;GOTO, GOSUB, LINE, RUN, RESTORE & LIST
1 RANDOMIZE USR (MEM+228)
1 RANDOMISE USR (MEM+114)
1 RANDOMISE USER MEM
1 RABBIT %
1 Program BARRY THORNE
1 Press any key to continue.
1 Press any key to continue
1 POKE 23512,0 for left
1 POKE 23511, 1,2,3 blocks.
1 POKE 23510, top block 0,1,2.
1 POKE 23506,No of pixels up
1 POKE 23505,No of pixels down
1 PLAY TAPE TO VERIFY
1 PIXEL
1 P$="You take the ":
1 OWGGGGGGgg
1 NB. if it doesn't
1 London W4 4PH.
1 Jimpix
1 J$'"You see blood on the floor.":
1 J$'"You see an alarm Button":
1 J$'"You see a hole in the ceiling.":
1 In order to break out of the game to load side 2 of 16/48, Press CAPSHIFT 6 ,Type LOAD"""" "'"ENTER, and play side 2.
1 HEL=HEL*.5
1 H HYDROGEN -259 -253g1HeHELIUM -270 -269g1LiLITHIUM 180 1330m1BeBERYLIUM 1280 2450m1B BORON 2030 2550s1C CARBON 3500 3900s1N NITROGEN -210 -196g1O OXYGEN -219 -183g1F FLUORINE -220 -188g1NeNEON -249 -246g1NaSODIUM 97.8 883 m1MgMAGNESIUM 650 1100m1AlALUMINIUM 660 2400m1SiSILICON 1410 2480c1P PHOSPHORUS 44.2 280 s1S SULPHUR 119 445 s1ClCHLORINE -101 -34 g1A ARGON -189 -186g1K POTASSIUM 63.2 760 m1CaCALCIUM 850 1440m1ScSCANDIUM 1400 2500m2TiTITANIUM 1680 3300m2V VANADIUM 1920 3400m2CrCHROMIUM 1900 2600m1MnMANGANESE 1250 2100m1FeIRON 1539 2900m1CoCOBALT 1492 2900m1NiNICKEL 1453 2820m1CuCOPPER 1083 2580m1ZnZINC 420 907 m1GaGALLIUM 29.8 2250m2GeGERMANIUM 958 2880c2AsARSENIC 0000 610 s1SeSELENIUM 217 685 s2BrBROMINE -7.3 58.2l1KrKRYPTON -157 -153g1RbRUBIDIUM 38.8 710 m2SrSTRONTIUM 770 1460m1Y YTTRIUM 1500 3000m2ZrZIRCONIUM 1850 4400m2NbNIOBIUM 2420 510
1 Graphics JIM DANN
1 GOSUB 9800 or 9810 to change script.
1 GGGGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGEEGGGG
1 GGGGGGGGGGG
1 GGGEGCGGGGGGGGGGGGGGBGG
1 GGFGGGGGGGDGGGGGGGGGGGG
1 For upwards scrolling
1 For sideways scrolling
1 For downwards scrolling
1 ELEMENTAL MENU
1 Don,t Panic
1 DON'T PANIC
1 Code stored at MEM,
1 CHAT %
1 C$="You go along a corridor to a":
1 Bhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000HOOOOOOOOOOOOOOOOOOOOOOOOOO`OOOOHOOOOOOO`````````O````OOOOOOOOOOHOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO`OOOO`OO```````````O OOOOOOOOOOH````OOOOOOOOOOOOOOOOOOOOOOOOOOOHOOOOOOO```````````O OOOOOOOOOO
1 BBBPPPPPPP
1 ALTERNATIVE INSTRUCTIONS
1 A@@@P@@@@@@D@@`@@
1 A$="ROBOT":
1 A Robot appears
1 =instructions or key changes."
1 ;'"Play the tape containing your previous game":
1 ;"the screen to moved";
1 ;"scroll UP.":
1 ;"scroll DOWN."''" POKE 23606,number of pixels to";
1 ;"press any key"
1 ;"be scrolled";
1 ;"What would George Orwell have thought about a magazine which can only be read by a machine?"
1 ;"What do you want to do now ?"''"Press"'"
1 ;"We have 3 routines stored"'" in the memory."''" Scroll up at MEM (=32290)"''" Scroll down at (MEM+114)"''" Scroll sideways at (MEM+228)"
1 ;"To scroll the top 1/3rd of the screen 25 pixels to the left and then 25 to the right we do this;-"''" POKE 23510,
1 ;"This month sees the first"'" chapter of our adventure game":
1 ;"This is our first program to give all you 48K folk more than your 16K brethren."'" INSTANT GRAPHICS.":
1 ;"This is a killer wasp...";
1 ;"This is a dead fly......";
1 ;"This adventure continues in the next edition."
1 ;"The scrolling routines are in a block of 307 bytes of machine code stored in RAM starting at ";MEM;". We will call the start address of the code MEM from now on."
1 ;"The routines all look for this information in memory locations 23505 to 23512(in the print"'" buffer)."'" (These addresses still apply"'" even if you move the code.)"''" You will need to POKE these"'" these addresses as shown on the next page.":
1 ;"The renumbering has tried to go above line 9947"'"
1 ;"The long way home"
1 ;"TAPE 03 FEBRUARY 84 SIDE 1"
1 ;"Start the tape":
1 ;"Sorry, but this is one program which you cannot RUN from the middle.":
1 ;"Select cheatability (
1 ;"SUMMARY"
1 ;"STOP THE TAPE":
1 ;"START THE TAPE"'
1 ;"SIDE 2 LOADING"
1 ;"SIDE 1 LOADING"
1 ;"SCORE=";s;" "
1 ;"SCORE=";s;" "
1 ;"SCORE=";s
1 ;"SCORE= ";s;"/10":
1 ;"Run the tape for the next review"
1 ;"RUN THE TAPE":
1 ;"Q = Quit "
1 ;"Press any key";
1 ;"PROGRAM LENGTH"
1 ;"PRESS A KEY"
1 ;"PLEASE WAIT"
1 ;"Lines now renumbering every ";b;" ":
1 ;"Let the tape run to the end of side one (16K machines will not LOAD the machine code after the adventure game."'"If you save the game it will"'"only run after CLEAR 32766":
1 ;"LOW SCORE=";ls
1 ;"If you have 16K machine then you can still enjoy the game but do try to see it on a 48K machine if you get a chance."''" We could use some feedback on this memory business. Write and complain if you are going to be too frustrated if we publish the odd couple of 48K only programs."''" Squeezing ""ELEMENTS"" into 16K"'" was hard work and limiting." :
1 ;"INSTRUCTIONS";"(cont.)"''
1 ;"INSTRUCTIONS"
1 ;"Here is an example showing how to scroll 40 pixels up and then down again."'" Line 3200 of this program looks like this"''"3200 POKE 23505,40:POKE 23506,40: RANDOMISE USR (MEM+114): RANDOMIZE USR MEM"''"When you press a key this line will be executed."
1 ;"HIGH SCORE=";hs;:
1 ;"Firstly, I would like to thank all those of you who responded to issue 1 with letters"'" programs or competition"'" entries. As you will see, the standard has been very high."''" We only had room for one"'" reader's program in this issue but there are some great things on the way.":
1 ;"First line number now "'a:
1 ;"EXTRA COMMANDS FOR 48K'ers"
1 ;"ENTER your name please.";
1 ;"Don't worry about the silence between loading the program & machine code"
1 ;"DESCRIPTION"
1 ;"Before scrolling up or down;-"'''" POKE 23505,number of pixels to";
1 ;"All these POKEs and calls are summarised in lines 3 to 6 of this program."'''" To save this whole program and the code simply BREAK and"'" GOTO 9999. Have a look at line 9999 first to see what it does."''" To save the code only use"'" SAVE ""SCROLL""
1 ;"All the old offers still hold. Send letters, problems, or ideas to "'"
1 ;"8 = Move right";
1 ;"7 = Move up ";
1 ;"6 = Move down ";
1 ;"5 = Move left ";
1 ;"2 for the bottom"''" POKE 23511,number of thirds to";
1 ;"1,2 or 3."
1 ;"1 to scroll right"''" The routine will return to the basic after scrolling one"'" pixel.":
1 ;"1 for the middle";
1 ;"0 for the top";
1 ;" to load SPIDER.";
1 ;" You can also scroll each third of the screen independantly left or right.":
1 ;" This is a game for two players based upon an old board game which will be recognised when you see that the two players are
1 ;" The aim is to be the first"'" player to reach 100 and then get back home."''" Once you land exactly on 100 your moves automatically go into reverse so that you can race home."''" To move just press any key except
1 ;" START TAPE ";
1 ;" COMMENTS & FAULT FINDING "''
1 ;" Before we can use the up or"'" down routines we need to"'" specify how many pixels we wish the screen to move."''" Before moving sideways we need to specify which parts of the screen and which direction.":
1 ;" Before scrolling sideways;-"''" POKE 23510,the highest third of";
1 ;" A machine code routine which"'" will let you scroll the whole screen up an down like this."
1 ;" 16/48 FEBRUARY 84 TAPE 03 "
1 ;" THE 15......A READER'S PROGRAM"'"OTH MACHINE CODE SCROLLING...SMO"
1 ;" SPIDER......CAN YOU TRAP ME? "'"RACE FOR HOME VORTEX.......A "
1 ;" REVIEWS.....3D TANK GAMES SSUE 1 WINNERS COMPETITION & I"
1 ;" ELEMENTS....DATA BASE AND TEST"'"EFUL PROGRAM AID RENUMBER.....US"
1 ;" ADVENTURE...THE LONG WAY HOME "'"ND GREEN MEN MORE DUNGEONS A"
1 ;" Prsss ~C~ for a print out"
1 ;" RUN THE TAPE ":
1 ;" ";:
1 ;" ";
1 ;" ":
1 ;" ";:
1 ;" ";
1 ;" "
1 ;" "
1 ;" ":
1 ;"
1 :88888888x88888x888888
1 :(just 1 block)
1 :(for top block)"'" POKE 23511,
1 9988888888888888
1 998888888888
1 9950 to renumber":
1 8???????????????????????????????8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888888888888888888888888888888888888
1 88899888888888x88888888
1 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
1 8888888888888888888888888
1 8888888888
1 888'''''''''' '''''''''''888!!!!''''''''''''' ''''''''''''''888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
1 888!!!''''''' '''''''''
1 3DTANX
1 3DDP `
1 3DCZ
1 3D TANX by DK'tronics.#Don Priestly has placed you in command of an anti-tank gun trained on a bridge which spans the screen. Your orders are to stop any enemy tanks crossing (they shall not pass!).#The enemy have other ideas! They rumble across the bridge from right to left and it is not long before your presence is realised and your position calculated. From then on you are under constant bombardment.#You control your gun elevation and your horizontal movement with keys chosen from a menu which also offers useful options such as unlimited ammo, invulnerability and level of difficulty.#3D TANX is a simple, addictive game with plenty of action. Almost one of the classics.}
1 3D DESERT PATROL by CRL.#Here you are faced with tanks and minefields with only a crude compass, rangefinder and mine detector to help you. You are constantly harrassed by enemy tanks which appear from nowhere and at great speed (relatively).#The program is written partly in BASIC, calling on machine code routines to provide movement and returning to BASIC whenever anything significant happens. This has serious disadvantages.#When an enemy tank leaves your field of view it ceases to exist and every time you fire a shell the game freezes.#When one accepts these limitations 3D Desert Patrol does become playable, if somewhat dull.}
1 3D COMBAT ZONE by Artic.#3D Combat zone is a pretty faithful reproduction of the arcade game 'Batle Zone' (an old favourite of mine). Before you lies a desolated landscape populated by intelligent tanks, super tanks and flying saucers, but alas none of the missiles that got the adrenaline pumping in the original.#You can explore this environment through your gunsight as you manouver your tank between perspective wire frame pyramids, using the radar screen to track your deadly foes.#Screen movement is slightly jerky, but given the need for constant recalculations of perspective it is quite acceptable.# This is a very ambitious game to translate onto the Spectrum. It does not quite have the speed of the original but is still very impressive. Recommended. Well done John Ritman and Artic.}
1 32290,307"
1 307 bytes long.
1 25: RANDOMIZE
1 23733=255)":
1 1902190519081911191419171920192319261929172917261723172017171714171117081705170215021505150815111514151715201523152615291329132613231320131713141311130813051302110211051108111111141117112011231126112909290926092309200917091409110908090509020702070507080711071407170720072307260729052905260523052005170514051105080505050203020305030803110314031703200323032603290129012601230120011701140111010801050102c
1 16/48TITLE
1 16/48REV#3
1 16/48Noise
1 16/48LOAD2
1 16/48LOAD1
1 16/48EDIT /
1 16/48D&G
1 16/48 magazine,
1 10020203STOP THE TAPE a
1 10 Barley Mow Passage,
1 1 for right.
1 ."''" Cheatability decides how slowly the die changes so that you can control your moves."
1 ."''"
1 ,paddr-256
1 ,o;"You score 1 point for each step you take up to the time you hit something fatal (a wasp,your trail,my trail or the wall). "'"You will start with the first key press and you cannot stop."
1 ,o;"You are a spider........
1 ,o;"If you BREAK from this program restart with GOTO 1000. NOT RUN.";
1 ,o;"I am also a spider......
1 ,o;" ADVENTURE HELP FROM Yaz. "
1 ,i;"Press R to read again.";
1 ,i;"Press L to load VORTEX"
1 )="ll000101"+
1 )="10020203STOP THE TAPE":
1 )="10020203RUN THE TAPE":
1 )="10020203"+a$(n,a
1 )="02020203"+a$(n,c
1 )="02000102Atomic No Symbol Name Mass No m.p. b.p. Density":
1 );" lines. Try changing thevalue of 'mx' (line 9947) next time."
1 )-(l<cl)*(
1 )-(c<cc)*(
1 ),x(hole,2
1 )*(k$=r$)-(
1 )*(k$=d$)-(
1 (prog+z)=14
1 (prog+z)):
1 (prog+len+5
1 (prog+len+4
1 (h(n)-h(n-10
1 (cl,cc)<55
1 (MEM+228): NEXT n:"'" POKE 23512,1:(to go right)"'" FOR n=1
1 (MEM+228): NEXT n":
1 ((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
1 (((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((( ((((((((((( ((((((((( ((((((( ((((( ((( ( 88888888888888888888888888888888
1 'C$'"small ANTE-ROOM."'"You see many small boxes.":
1 'C$'"RECEPTION ROOM":
1 ''"Do you want a print out of theseinstructions ? (y/n)"
1 ''" For those of you new to using machine code routines we will try to make it easy for you.":
1 '"Your score is ";
1 '"You find yourself in a"
1 '"You are in a TRANS-MAT unit.You see a faulty control panel with a button on it.":
1 '"Do you want to read these again?"'"(y/n)"
1 '"Do you want to load a previous game ?"
1 '" You can load the code to any address you like so long as you remember to CLEAR to a lower address and let MEM = the new address.":
1 '" POKE 23512,0 to scroll left";
1 '" (If you BREAK from this program you can re-enter with GOTO 20. Do not use RUN.)"
1 #p;("DUMP - This will SAVE &
1 #p;'"It is the year 4816, you are on your way home. You step into a Trans-mat unit, press the control & dematerialize."
1 #p;"b) You may load ""renumber"" before you start to write a program and then type RUN 9947 to renumber."
1 #p;"a) You can MERGE ""renumber"" with programs already in memory.If you do press CLEAR first thenRUN 9947"
1 #p;"WHAT CAN I SEE - This reminds you of where visible exits are"'("and shows you a picture."
1 #p;"If your new program contains thestatement GOTO 00 ,
1 #p;"If you get an 'out of memory' or'variable not found' report check that you have CLEARed the program to be renumbered. If that doesn't work get a bigger spectrum."
1 #p;"If you find that you have lost the last few lines of a program then it is because it is longer than ";100
1 #p;"Avoid giving more than one"'"instrucion per sentence."''"Two corridoors are curved this may confuse map makers !"
1 #p;"8) When the program has finishedit will ask you if you want to renumber another section. If youdo not want to, then ~renumber~ will erase itself."
1 #p;"7) Go and make a cup of tea."
1 #p;"6) The computer will ask you forthe first line to be renumbered. If you want to renumber the whole program
1 #p;"5) Type GOTO 9950"
1 #p;"4) When the computer gives you the 'OK' or 'STOP' report you can list your program."
1 #p;"3) When the program asks you, type in MERGE """""
1 #p;"2) You can sort your program into different blocks if you renumber the lowest numbered lines first. LIST the result andthen GOTO 9950"
1 #p;"2) LOAD ""renumber""."
1 #p;"1) SAVE a copy of your program on cassette.
1 #p;"1) LOAD ""renumber"" then follow the instructions."
1 #p''"16/48 Presents the first episodeof a new text & graphics"'"adventure game.(High speed, hi-res graphics for 48K'ers only.)"
1 #p'"You tell the computer what you want to do by typing in ENGLISH.(Then pressing enter)"
1 #p'"Use short sentences if possible."
1 #p'"The idea of the game is to find your way through the spaceship and find the way out into the next episode."
1 #p'"Something is wrong !"'"You rematerialize in the wrong place. You are in some sort of spaceship..."
1 #p'"N =GO NORTH"'"S =GO SOUTH ...etc"'"INSTRUCTIONS - gives you these instructions again."
1 #p'"HELP - The computer may give youadvice."'("DUMP - This will SAVE and
1 #p'"GO NORTH (SOUTH etc.)"'"WHAT HAVE I GOT WITH ME ?"'"EXAMINE THE ..."'"TAKE THE ..."'"ATTACK THE.."
1 #p'"Draw a map wherever you go so that you can find your way back."
1 #p'"Don't worry if your character iskilled early on in your first game, it is all part of the learning process !"
1 #p'"Certain single words can be usedas commands. These are:"
1 "rewind & play":
1 "renumber"
1 "renintro"
1 "number of program lines ";t'"renumbering from ";a'"finishing at line ";
1 "nothing.":
1 "line ";line;" not found":
1 "elements"
1 "comfortable LOUNGE"'"You see some chairs & pictures on the walls.":
1 "advintro#1"
1 "advent1/48"
1 "a","90","102","165","219","165","66","66","102","b","28","235","150","9","9","150","235","156","c","102","66","66","165","219","165","102","86","d","56","215","105","144","144","105","215","56","e","129","66","36","24","24","36","66","129","f","24","60","24","60","90","217","153","102","k","207","179","124","150","171","124","179","207","l","254","253","107","7","7","107","253","254"
1 "a store room."'"You see some large boxes of gold& diamonds":
1 "Your powerpack is exhausted.":
1 "You wait.":
1 "You take the";a$;" & put it on.":
1 "You specify how blocks of your programs are to be renumbered."
1 "You see the following;":
1 "You see nothing of interest.":
1 "You kill the man & damage his spacesuit.":
1 "You kill the Robot with your gun":
1 "You hear a distant explosion."'"The air rushes out.":
1 "You have with you"
1 "You have nothing to eat.":
1 "You have no spacesuit.":
1 "You have no Powerpack for your gun."
1 "You have been killed":
1 "You eat some food, you feel muchbetter!":
1 "You dematerialize":
1 "You cannot.":
1 "You cannot go ";a$:
1 "You cannot eat in a spacesuit !":
1 "You can only change direction. "'"You do this with keys 5 to 8 or you can choose your own keys by pressing
1 "You can LIST now":
1 "You attack the Robot with your fists."
1 "You are weak & hungry"
1 "You are unable to do so.":
1 "You are lucky ";k$'"the robot":
1 "You are in a hall with many"'"Robots.They line up menacingly":
1 "Write this code down on a piece of paper.It is your entry code to the next episode."'t$;hel
1 "Which direction ?":
1 "What are you going to do ?"'"
1 "This program will renumber all, or blocks of other BASIC"'"programs and then delete itself."
1 "There is nothing to talk to.":
1 "There are exits visible;"'("North "
1 "The wall slides open":
1 "The wall closes behind you."
1 "The screen is a web and you musteat the flies(20 points each) and try to trap me(100 points). "'"Each time you trap me a relativeappears from nowhere to continuethe fight."
1 "The robot attacks you.":
1 "The program will report with error 'G'"'"Don,t worry.","Press any key to erase & then ENTER LIST":
1 "The program will renumber GOTO, GOSUB, LINE, LIST, RESTORE and RUN."
1 "The program will also tell you if you have specified jumps to non-existent lines."
1 "The picture on the west wall has a concealed button.":
1 "The most common words that I understand are;":
1 "The man says'The TRANS-MAT unitsare being affected by a high energy star.This room contains many units,they must be removed before the unit you arrived in will work.I have wired a controlfor this you must..'"'"The man dies.":
1 "The man is wounded."'"He can still talk.":
1 "The computer will override your instructions only if there is a danger of a program being corrupted because instructions would cause line numbers to go above line 9947."
1 "The blood leads south":
1 "The 48K spectrum can renumber upto 37KBytes. In addition it is possible to specify the maximum number of lines to renumber by changing the value of 'mx' in the renumber program.(line 9947)"
1 "The 16K Spectrum can renumber a program of up to 5KBytes or 100 lines."
1 "TEl No ";
1 "TAKE","GOT","EAT","HELP","SEE","LOOK","EXAMINE","SAY","NORTH","SOUTH","EAST","WEST","UP","DOWN","THROUGH","LEAVE","ATTACK","KILL","PRESS","PUSH","PULL","WAIT"
1 "SHOOT","QUIT","DUMP"
1 "Renumber another segment ?(y/n)";a$:
1 "PRESS r TO RESTART";m$
1 "Only one lever seems to be"'"connected":
1 "Now MERGE the program to be renumbered"
1 "Nothing happens.":
1 "Long Way"
1 "Large storeroom."'"You see some large metal crates,a man"+(" in a spacesuit."
1 "It is too heavy!":
1 "In the boxes you find;"'"Food, a torch, a laser gun,"'"a powerpack and a compass.":
1 "If the program has a jump to a number variable this is left in."''
1 "INSTRUCTION"
1 "I did not understand that !":
1 "Highest score today!";
1 "Find out what the lever does.":
1 "ENTER answer";r$:
1 "ENTER UP KEY";
1 "ENTER RIGHT KEY";
1 "ENTER LEFT KEY";
1 "ENTER DOWN KEY";
1 "Do you want to save this game on a blank tape ? (y/n)"
1 "CONTROL ROOM. You see a crudely rewired control console.":
1 "Be thankful that you are wearinga spacesuit !":
1 "ALL","EVERYTHING","GOLD","DIAMOND","SPACESUIT","FOOD","GUN","POWERPACK","TORCH","COMPASS","PICTURE"
1 "ADVENTURE"
1 ";';" We will pay `5 for anything we publish and `50 if you can send us an original program which we can feature.";';" Meanwhile enjoy the rest of the tape....":
1 "46+25*(g$=""2"")+7*(g$=""3"")+22*(g$=""4"")":
1 "23635"+256
1 "192","192","0","24","24","0","3","3","0","102","102","0","0","102","102","0","195","195","0","24","24","0","195","195","0","219","219","0","0","219","219","0","62","64","62","1","62","64","62","2","66","66","126","66","66","126","66","66","0","127","127","96","103","103","102","102","0","255","255","0","255","255","0","3","0","254","254","0","240","240","48","48","102","102","103","103","96","127","127","0","7","3","255","255","0","255","255","0","176","48","48","48","48","48","240","0","0","4","6","127","127","102","100","96","96","96","96","127","127","0","0","0","0","0","0","224","231","231","230","230","24","60","126","24","248","248","0","0"
1 "16/48D&G"
1 "100+100*(
1 "0","0","0","24","24","0","0","0","0","6","6","0","0","96","96","0"
1 "''"This program contains data on 100 elements. How many do you want?"'''"
1 "''" No Symbol","Name"
1 "'"WAIT - you do nothing."'"QUIT - This restarts the game."
1 "'" POKE 23512,0:(to go left)"'" FOR n=1 TO 25: RANDOMIZE
1 !!! '''' ''''''
1 ! pp00000
1 to try the renumber program ( N.B. you will not be able to renumber any
1 to stop the die."''" Press
1 to run the program again"
1 to read again.";
1 to read again. Press
1 to read again";
1 to quit ~renumber~ and load the next item in
1 to quit at any time."
1 to quit and move on."
1 to quit and move on":
1 to quit and load next item."''''"
1 to print the instructions on the printer"
1 to play another game."
1 to move on."
1 to move on. ":
1 to move on.
1 to go again.
1 to go "
1 to go "
1 to find out more.";
1 the first line to renumber";init'"The number you want it to be",a'"The increase in line numbers",b:
1 starts at prog+730
1 programs!)"
1 only 46 well known elements"''"
1 now."''"Press any other key to start."
1 is a vortex. If you land on a vortex you disappear into a black hole and pop up
1 for the instructions again on the screen"
1 details of your game so that youcan RUN the game again from thatpoint."
1 at prog+34
1 at prog+326,361,402, 453,484,517,550,593,632,673
1 at prog+237 poke 64,72,80 in prog+239 poke 64*1,2,3 in prog+241
1 at prog+211 poke 64,72,80 in prog+213 poke 64*1,2,3 in prog+215
1 all one hundred elements"'''" Press
1 all but 29 obscure elements"''"
1 add in man made elements"''"
1 USEFUL PHRASES
1 Trouble with a crab";
1 To Quit menu"
1 Stony stares";
1 Something you can't read";
1 Something to hot to handle";
1 No rope";
1 Matches wet";
1 MAKE SURE THAT YOU PRESS 'CLEAR' BEFORE YOU SAVE IT
1 INSTRUCTIONS
1 IF YOU HAVE PRESSED 'CLEAR' or 'RUN' THEN TYPE RUN 9947
1 GET OUT OF HERE !
1 DON'T PANIC
1 Can't pass the erie figure";
1 Can only find 5 locations";
1 COMMANDS "
1 B.C.THORNE SEPT 1983
1 0 .Otherwise follow the instructions."
1 to quit";#1
1 the program WILL jump to the correct line number!"
1 Test on symbols"'''"
1 Test on names"'''"
1 List names and symbols only"'''"
1 List elements and data"'" (m.p.=melting pt in Celcius b.p.=boiling pt"'" density is in g/ml)"'''"
1 at prog+154 poke lines in prog+141 poke new attr in prog+142
1 """"""""""" !!!
1 pp00000p111
1 PLEASE WAIT "
1 ''8>00>8''
1 0000000000 !!!!"
1 "
1 0000000000 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
1 (MEM=32290 if you have not moved it.)
1 in this
1 This
1 %!!!!!!!%%% 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
1 "
1
1
1
1
1
1
1
1
1
1